../../mct/shr/seq_flds_mod.F90